﻿Public Class GumballMonitor
    Private _machine As GumballMachine

    Public Sub New(ByVal machine As GumballMachine)
        _machine = machine
    End Sub

    Public Sub Report()
        Console.WriteLine("Gumball Machine: " + _machine.Location)
        Console.WriteLine("Current inventory: " + _machine.Count.ToString + " gumballs")
        Console.WriteLine("Current state: " + _machine.CurrentState.ToString)
    End Sub
End Class
